home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 2 / Meeting Pearls Vol. II (1995)(GTI - Schatztruhe)[!].iso / SetAttributesDir / Pearls / dev / Oberon-A / SetAttributes
Text File  |  1995-02-27  |  3KB  |  114 lines
  1. .k ScriptDir/A
  2. Failat 21
  3. Protect "c.info" "RWD"
  4. FileNote "c.info" ""
  5. Protect "c" "RWED"
  6. FileNote "c" ""
  7. CD "c"
  8. Assign ScriptDir<$$>.4: "<ScriptDir>"
  9. Execute "ScriptDir<$$>.4:c/SetAttributes" "ScriptDir<$$>.4:c"
  10. CD /
  11. Protect "clickme.first" "RWED"
  12. FileNote "clickme.first" ""
  13. Protect "clickme.first.info" "RWD"
  14. FileNote "clickme.first.info" ""
  15. Protect "Docs.info" "RWD"
  16. FileNote "Docs.info" ""
  17. Protect "Docs" "RWED"
  18. FileNote "Docs" ""
  19. CD "Docs"
  20. Assign ScriptDir<$$>.4: "<ScriptDir>"
  21. Execute "ScriptDir<$$>.4:Docs/SetAttributes" "ScriptDir<$$>.4:Docs"
  22. CD /
  23. Protect "Examples.info" "RWD"
  24. FileNote "Examples.info" ""
  25. Protect "Examples" "RWED"
  26. FileNote "Examples" ""
  27. CD "Examples"
  28. Assign ScriptDir<$$>.4: "<ScriptDir>"
  29. Execute "ScriptDir<$$>.4:Examples/SetAttributes" "ScriptDir<$$>.4:Examples"
  30. CD /
  31. Protect "FPE" "RWED"
  32. FileNote "FPE" ""
  33. Protect "FPE.info" "RWD"
  34. FileNote "FPE.info" ""
  35. Protect "GUIEnv.info" "RWD"
  36. FileNote "GUIEnv.info" ""
  37. Protect "GUIEnv" "RWED"
  38. FileNote "GUIEnv" ""
  39. CD "GUIEnv"
  40. Assign ScriptDir<$$>.4: "<ScriptDir>"
  41. Execute "ScriptDir<$$>.4:GUIEnv/SetAttributes" "ScriptDir<$$>.4:GUIEnv"
  42. CD /
  43. Protect "Index.doc" "RWED"
  44. FileNote "Index.doc" ""
  45. Protect "Index.doc.info" "RWD"
  46. FileNote "Index.doc.info" ""
  47. Protect "Install.info" "RWD"
  48. FileNote "Install.info" ""
  49. Protect "Install" "RWED"
  50. FileNote "Install" ""
  51. CD "Install"
  52. Assign ScriptDir<$$>.4: "<ScriptDir>"
  53. Execute "ScriptDir<$$>.4:Install/SetAttributes" "ScriptDir<$$>.4:Install"
  54. CD /
  55. Protect "Libs.info" "RWD"
  56. FileNote "Libs.info" ""
  57. Protect "Libs" "RWED"
  58. FileNote "Libs" ""
  59. CD "Libs"
  60. Assign ScriptDir<$$>.4: "<ScriptDir>"
  61. Execute "ScriptDir<$$>.4:Libs/SetAttributes" "ScriptDir<$$>.4:Libs"
  62. CD /
  63. Protect "Macros.info" "RWD"
  64. FileNote "Macros.info" ""
  65. Protect "Macros" "RWED"
  66. FileNote "Macros" ""
  67. CD "Macros"
  68. Assign ScriptDir<$$>.4: "<ScriptDir>"
  69. Execute "ScriptDir<$$>.4:Macros/SetAttributes" "ScriptDir<$$>.4:Macros"
  70. CD /
  71. Protect "Oberon-A Shell.info" "RWD"
  72. FileNote "Oberon-A Shell.info" ""
  73. Protect "Oberon-A.doc" "RWED"
  74. FileNote "Oberon-A.doc" ""
  75. Protect "Oberon-A.doc.info" "RWD"
  76. FileNote "Oberon-A.doc.info" ""
  77. Protect "OLib.info" "RWD"
  78. FileNote "OLib.info" ""
  79. Protect "OLib" "RWED"
  80. FileNote "OLib" ""
  81. CD "OLib"
  82. Assign ScriptDir<$$>.4: "<ScriptDir>"
  83. Execute "ScriptDir<$$>.4:OLib/SetAttributes" "ScriptDir<$$>.4:OLib"
  84. CD /
  85. Protect "ReadMe" "RWED"
  86. FileNote "ReadMe" ""
  87. Protect "ReadMe.info" "RWD"
  88. FileNote "ReadMe.info" ""
  89. Protect "s.info" "RWD"
  90. FileNote "s.info" ""
  91. Protect "s" "RWED"
  92. FileNote "s" ""
  93. CD "s"
  94. Assign ScriptDir<$$>.4: "<ScriptDir>"
  95. Execute "ScriptDir<$$>.4:s/SetAttributes" "ScriptDir<$$>.4:s"
  96. CD /
  97. Protect "Source.info" "RWD"
  98. FileNote "Source.info" ""
  99. Protect "Source" "RWED"
  100. FileNote "Source" ""
  101. CD "Source"
  102. Assign ScriptDir<$$>.4: "<ScriptDir>"
  103. Execute "ScriptDir<$$>.4:Source/SetAttributes" "ScriptDir<$$>.4:Source"
  104. CD /
  105. Protect "Texts.info" "RWD"
  106. FileNote "Texts.info" ""
  107. Protect "Texts" "RWED"
  108. FileNote "Texts" ""
  109. CD "Texts"
  110. Assign ScriptDir<$$>.4: "<ScriptDir>"
  111. Execute "ScriptDir<$$>.4:Texts/SetAttributes" "ScriptDir<$$>.4:Texts"
  112. CD /
  113. Assign ScriptDir<$$>.4:
  114.